home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / progs / utility / amipc_biback_v1.1 / pc / install_on_pc_disk < prev    next >
Text File  |  1996-11-13  |  2KB  |  99 lines
  1. ;
  2. ;  $VER: AmiPC BiBack PC Install 1.0 (12.11.96)
  3. ;
  4.  
  5. ;***************************************************************************;
  6.  
  7. ;
  8. ; English Texts
  9. ;
  10. ;
  11.  
  12. (set #install-infos
  13. (cat "\n"
  14.      "This script install the PC version of AmiPC BiBack on a PC disk"
  15. ))
  16.  
  17. (set #insert-disk
  18. (cat "\n"
  19.      "Please insert any disk in drive 'PC0:'"
  20. ))
  21.  
  22. (set #no-disk
  23. (cat "Error : No disk has been inserted in drive 'PC0:' !!"
  24. ))
  25.  
  26. (set #formating-disk
  27. (cat "Please wait, formating disk..."
  28. ))
  29.  
  30. (set #unarchiving
  31. (cat "Please wait, unarching program to PC disk..."
  32. ))
  33.  
  34. ;***************************************************************************;
  35.  
  36. ;
  37. ; French Texts
  38. ;
  39. ;
  40.  
  41. (if (= @language "français")
  42. (
  43.  (set #install-infos
  44.  (cat "\n"
  45.       "Ce script installe la version PC d'AmiPC BiBack sur une disquette PC"
  46.  ))
  47.  
  48.  (set #insert-disk
  49.  (cat "\n"
  50.       "Insérez SVP une disquette dans le lecteur 'PC0:'"
  51.  ))
  52.  
  53.  (set #no-disk
  54.  (cat "Erreur : Aucun disque n'a été insérer dans le lecteur 'PC0:' !!"
  55.  ))
  56.  
  57.  (set #formating-disk
  58.  (cat "Patientez SVP, formatage du disque..."
  59.  ))
  60.  
  61.  (set #unarching
  62.  (cat "Patientez SVP, désarchivage du programme sur le disque PC..."
  63.  ))
  64.  
  65. ))
  66.  
  67. ;***************************************************************************;
  68.  
  69.  (complete 0)
  70.  
  71.  (message #install-infos)
  72.  
  73.  (if (askbool
  74.       (prompt #insert-disk)
  75.       (help "")
  76.       (choices "Format & Install"
  77.                "Abort"
  78.       )
  79.      )
  80.  (
  81.   (if (exists "PC0:")
  82.   (
  83.    (working #formating-disk )
  84.  
  85.    (run "SYS:System/Format DRIVE PC0: NAME AmiPC NOICONS")
  86.   
  87.    (working #unarchiving)
  88.   
  89.    (run "LhEx -fqwPC0: x AMIPC.LHA")
  90.  
  91.    (set @default-dest "AmiPC:")
  92.   )
  93.   (abort #no-disk)
  94.   )
  95.  ))
  96.  
  97.  (exit)
  98.  
  99.